home *** CD-ROM | disk | FTP | other *** search
/ Maximum CD 2000 November / Maximum CD 2000 Nov.iso / AofE-Conquerers / age2xtrial.exe / CABFILE / MSGAME.CAB / Data / gamedata_x1.drs / Unnamed File 000027.bina < prev    next >
Text File  |  2000-07-18  |  3KB  |  159 lines
  1. ;error trapping
  2. (defrule
  3.     (current-age == imperial-age)
  4.     (not (goal rush-control NO) )
  5. =>
  6.     (set-goal rush-control NO)
  7. )
  8.  
  9. ;should we launch a rush?
  10. (defrule
  11.     (goal rush-control NOTICE)
  12. =>
  13.     (generate-random-number 12)
  14.     (disable-self)
  15. )
  16.  
  17. (defrule
  18.     (goal rush-control NOTICE)
  19.     (difficulty > hard)
  20.     (random-number == 1)
  21.     (or
  22.         (not (goal 1 10) )
  23.         (map-type archipelago)
  24.     )
  25. =>
  26.     (set-goal rush-control RUSHING)
  27.     (disable-self)
  28. )
  29.  
  30. (defrule
  31.     (goal rush-control NOTICE)
  32.     (difficulty > hard)
  33.     (random-number == 2)
  34.     (or
  35.         (not (goal 1 10) )
  36.         (map-type archipelago)
  37.     )
  38. =>
  39.     (set-goal rush-control FEUDAL)
  40.     (disable-self)
  41. )
  42.  
  43. (defrule
  44.     (goal rush-control NOTICE)
  45.     (difficulty > hard)
  46.     (random-number >= 3)
  47.     (random-number <= 8)
  48. =>
  49.     (set-goal rush-control CASTLE)
  50.     (disable-self)
  51. )
  52.  
  53. (defrule
  54.     (goal rush-control NOTICE)
  55.     (difficulty <= hard)
  56.     (random-number <= 9)
  57. =>
  58.     (set-goal rush-control CASTLE)
  59.     (disable-self)
  60. )
  61.  
  62. (defrule
  63.     (goal rush-control NOTICE)
  64. =>
  65.     (set-goal rush-control IMPERIAL)
  66.     (disable-self)
  67. )
  68.  
  69. (defrule
  70.     (goal rush-control FEUDAL)
  71.     (or
  72.         (map-type black-forest)
  73.         (map-type fortress)
  74.     )
  75. =>
  76.     (set-goal rush-control IMPERIAL)
  77.     (disable-self)
  78. )
  79.  
  80. (defrule
  81.     (goal rush-control RUSHING)
  82.     (current-age == dark-age)
  83.     (or
  84.         (map-type black-forest)
  85.         (map-type fortress)
  86.     )
  87. =>
  88.     (set-goal rush-control IMPERIAL)
  89.     (disable-self)
  90. )
  91.  
  92. ;**************************************
  93. ;do the dark-age / feudal rush
  94. (defrule
  95.     (goal rush-control RUSHING)
  96.     (current-age == dark-age)
  97.     (soldier-count < five-percent-pop)
  98.     (or
  99.         (civilian-population >= civ-dark-rush)
  100.         (civilian-population >= 15)
  101.     )
  102.     (can-train militiaman)
  103. =>
  104.     (train militiaman)
  105.     (chat-local-to-self "train militia")
  106. )
  107.  
  108. ;*******************************************************
  109. ;FEUDAL RUSH RULES
  110. (defrule
  111.     (goal rush-control FEUDAL)
  112.     (current-age >= feudal-age)
  113. =>
  114.     (set-goal rush-control RUSHING)
  115.     (disable-self)
  116. )
  117.  
  118. ;go after boomers
  119. (defrule
  120.     (current-age >= feudal-age) 
  121.     (difficulty <= easy)
  122.     (players-current-age every-enemy <= feudal-age)
  123.     (players-civilian-population every-enemy > civ-castle)
  124. =>
  125.     (set-goal rush-control RUSHING)
  126.     (disable-self)
  127. )
  128.  
  129. ;end the feudal rush
  130. (defrule
  131.     (goal rush-control RUSHING)
  132.     (current-age == feudal-age)
  133.     (players-current-age any-enemy > feudal-age)
  134. =>
  135.     (set-goal rush-control IMPERIAL)
  136.     (disable-self)
  137. )
  138.  
  139. ;*******************************************************
  140. ;should we launch a castle rush?
  141. (defrule
  142.     (goal rush-control CASTLE)
  143.     (current-age >= castle-age)
  144. =>
  145.     (set-goal rush-control RUSHING)
  146.     (disable-self)
  147. )
  148.  
  149. ;end the rush
  150. (defrule
  151.     (goal rush-control RUSHING)
  152.     (current-age == castle-age)
  153.     (players-current-age any-enemy == imperial-age)
  154. =>
  155.     (set-goal rush-control IMPERIAL)
  156.     (disable-self)
  157. )
  158.  
  159.